home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD ROM Paradise Collection 4
/
CD ROM Paradise Collection 4 1995 Nov.iso
/
science
/
sm32a.zip
/
LIBRARY
/
NUME.LI
< prev
next >
Wrap
Text File
|
1993-12-25
|
77b
|
4 lines
nume(a_*b_) := nume(a)*nume(b)
nume(x_^n_) := if(n>0, x^n,1)
nume(x_) :=x